home *** CD-ROM | disk | FTP | other *** search
/ Czech Logic, Card & Gambling Games / Logické hry.iso / hry / Piskvorky / source / pbrain / PISKTUR.CPP < prev    next >
C/C++ Source or Header  |  2006-04-12  |  4KB  |  210 lines
  1. /*
  2.   (C) 2004-2006  Petr Lastovicka
  3.  
  4.   contents of this file are subject to the Reciprocal Public License ("RPL")
  5. */
  6. #include <windows.h>
  7. #pragma hdrstop
  8. #include <assert.h>
  9. #include <stdio.h>
  10. #include "board.h"
  11.  
  12. #define MATCH_SPARE 7      //how much is time spared for the rest of game
  13. #define TIMEOUT_PREVENT 3  //how much is alfabeta slower when the depth is increased
  14.  
  15. const char *infotext="author=\"Petr Lastovicka\", version=\"7.5\", country=\"Czech Republic\",  www=\"http://web.quick.cz/lastp\"";
  16.  
  17.  
  18. void brain_init() 
  19. {
  20.   if(width<5 || width>127 || height<5 || height>127){
  21.     pipeOut("ERROR size of the board");
  22.     return;
  23.   }
  24.   init();
  25.   pipeOut("OK");
  26. }
  27.  
  28. void brain_restart()
  29. {
  30.   brain_init();
  31. }
  32.  
  33. int brain_takeback(int x,int y)
  34. {
  35.   Psquare p=Square(x,y);
  36.   if(p<boardb || p>=boardk || !p->z) return 2;
  37.   p->z=0;
  38.   moves--;
  39.   evaluate(p);
  40.   lastMove=0;
  41.   return 0;
  42. }
  43.  
  44. static bool doMove0(Psquare p, int z)
  45. {
  46.   if(p<boardb || p>=boardk || p->z) return false;
  47.   p->z= z;
  48.   moves++;
  49.   evaluate(p);
  50.   lastMove=p;
  51.   return true;
  52. }
  53.  
  54. void brain_my(int x,int y)
  55. {
  56.   if(!doMove0(Square(x,y),1)){
  57.     pipeOut("ERROR my move [%d,%d]",x,y);
  58.   }
  59. }
  60.  
  61. void brain_opponents(int x,int y) 
  62. {
  63.   if(!doMove0(Square(x,y),2)){
  64.     pipeOut("ERROR opponents's move [%d,%d]",x,y);
  65.   }
  66. }
  67.  
  68. void brain_block(int x,int y)
  69. {
  70.   if(!doMove0(Square(x,y),3)){
  71.     pipeOut("ERROR winning move [%d,%d]",x,y);
  72.   }
  73. }
  74.  
  75. bool doMove(Psquare p)
  76. { 
  77.   if(p<boardb || p>=boardk || p->z) return false;
  78.   if(!terminate || !resultMove) resultMove=p;
  79.   return true; 
  80. }
  81.  
  82. void computer()
  83. {
  84.   int i;
  85.   DWORD t0,t1;
  86.   Psquare p;
  87.   
  88.   resultMove=0;
  89.   holdMove=0;
  90.   highestEval=0;
  91.   firstMove();  
  92.   if(resultMove) return;
  93.  
  94.   for(p=boardb; p<boardk; p++){
  95.     p->inWinMoves= winMoves1+MwinMoves;
  96.   }
  97.   UwinMoves=winMoves1;
  98.  
  99.   if(doMove(try4(0))){
  100.     #ifdef DEBUG
  101.       print("win4");
  102.     #endif
  103.     static bool w=false;
  104.     if(!w && resultMove->h[0].pv<H31){
  105.       w=true;
  106.       pipeOut("MESSAGE  I win !");
  107.     }
  108.     return; 
  109.   }
  110.   attackDone=defendDone=defendDone1=testDone=carefulAttack=carefulDefend=false;
  111.   loss4=try4(1);
  112.   if(loss4) doMove(loss4);
  113.   else getBestEval();
  114.   assert(resultMove);
  115.   #ifdef DEBUG
  116.     resulty=0;
  117.     mt=0;
  118.   #endif
  119.  
  120.   for(i=4; i<=50; i+=2){
  121.     depth=i;
  122.     #ifdef DEBUG
  123.       printXY(200,0,80,"   depth= %d   ", depth);
  124.     #endif
  125.     benchmark=0;
  126.     t0=GetTickCount();
  127.     computer1();
  128.     t1=GetTickCount();
  129.     if(terminate || t1+TIMEOUT_PREVENT*(t1-t0)>=stopTime()) break;
  130.   }
  131.  
  132.   if(terminate) depth-=2;
  133.   pipeOut("DEBUG depth %d, nodes %d", depth, benchmark);
  134.   #ifdef DEBUG
  135.     if(resulty>0) print("win");
  136.     if(resulty<0) print("loss");
  137.     if(resulty==0) print("---");
  138.     printXY(60,18,130,"moves=%d",benchmark);
  139.   #endif
  140. }
  141.  
  142. DWORD stopTime()
  143. {
  144.   return start_time + min(info_timeout_turn, info_time_left/MATCH_SPARE)-30;
  145. }
  146.  
  147. void brain_turn() 
  148. {
  149.   computer();
  150.   do_mymove(resultMove->x, resultMove->y);
  151. }
  152.  
  153. void brain_end()
  154. {
  155. }
  156.  
  157. //----------------------------------------------------------------------
  158. #ifdef DEBUG
  159.  
  160. HWND wnd=FindWindow("Piskvork",0);
  161.  
  162. void vprint(int x, int y, int w, char *format, va_list va)
  163. {
  164.   HDC dc= GetDC(wnd);
  165.   RECT rc;
  166.   rc.top=y;
  167.   rc.bottom=y+16;
  168.   rc.left= x - w/2;
  169.   rc.right= rc.left + w;
  170.   char buf[128];
  171.   int n = vsprintf(buf,format,va);
  172.   SetTextAlign(dc,TA_CENTER);
  173.   ExtTextOut(dc, x,y, ETO_OPAQUE, &rc, buf,n, 0);
  174.   ReleaseDC(wnd,dc);
  175. }
  176.  
  177. void printXY(int x, int y, int w, char *format, ...)
  178. {
  179.   va_list va;
  180.   va_start(va,format);
  181.   vprint(x,y,w,format,va);
  182.   va_end(va);
  183. }
  184.  
  185. void print(char *format, ...)
  186. {
  187.   RECT rc;
  188.   GetClientRect(wnd,&rc);
  189.   va_list va;
  190.   va_start(va,format);
  191.   vprint(rc.right*900/1000, 0, 80, format,va);
  192.   va_end(va);
  193. }
  194.  
  195. void paintSquare(Psquare p)
  196. {
  197.   SendMessage(wnd,WM_APP+123, p->z, MAKELPARAM(p->x,p->y));
  198. }
  199.  
  200. void brain_eval(int x,int y)
  201. {
  202.   Psquare p= Square(x,y);
  203.   printXY(300,0,60,"%d,%d", p->h[0].pv, p->h[1].pv);
  204.   printXY(300,16,60,"%d,%d", getEval(0,p),getEval(1,p));
  205.   printXY(300,32,60,"%d", getEval(p));
  206. }
  207.  
  208.  
  209. #endif
  210.